* lisp/svg.el (svg--encode-text): Fix off-by-one error in previous patch.

diff --git a/lisp/svg.el b/lisp/svg.el
index 241385fa91ff6b3be52e3d4d1da7f0769e8d82b5..42619ed35195dfdbaf5cc61e65800dc206a5d1ff 100644 (file)
--- a/lisp/svg.el
+++ b/lisp/svg.el
@@ -167,7 +167,7 @@ otherwise.  IMAGE-TYPE should be a MIME image type, like
     (goto-char (point-min))
     (while (not (eobp))
       (let ((char (following-char)))
-        (if (<= char 128)
+        (if (< char 128)
             (forward-char 1)
           (delete-char 1)
           (insert "&#" (format "%d" char) ";"))))